\chapter{Algoritmo SURF: pseudocodice}

Qui di sotto la realizzazione in {\em pseudocodice} del core principale dell'algoritmo SURF
utilizzato nella libreria per l'estrazione di punti di interesse dall'immagine considerata.

{\' E} possibile ottenere maggiori dettagli sull'algoritmo consultando il documento [2].

\begin{verbatim}
      REAL FUNCTION PROSCA*8(N,V1,V2)
C ** FUNCTION  V1 X V2 **
C
EXVAR: N,V1,V2 IN INPUT; PROSCA IN OUTPUT;
C
      INTEGER N,I
      REAL*8 V1(1),V2(1)
C
      PROSCA=0.
      DO 10 I=1,N
        IF((V1(I).NE.0.).AND.(V2(I).NE.0.))
     1    PROSCA=PROSCA+V1(I)*V2(I)
10    CONTINUE
      RETURN
      END
\end{verbatim}

Segue un listing di {\tt prosca}.

{\scriptsize
\begin{landscape}
\input{prosca.l}
\end{landscape}
} % end scriptsize

